home *** CD-ROM | disk | FTP | other *** search
- #[document 62.7 177.65 149.1 209
- static oe="odd_even",nzw="nonzero_winding",wc="winding_counting";
- static stroked="stroked";
- static vert="vertical",horz="horizontal";
- static miter="miter",bevel="bevel",round="round";
- static butt="butt",proj="projected";
- #[page
- auto m=move,l=line,c=curve;
- auto p;
- gc_cspace("Lab");
- gc_color(100.0,0.0,0.0);
- rect(0,0,0,0);
- auto ng=draw(path());
- auto s=array(ng);
- m(109.85,178.40);
- c(109.75,178.40,112.90,185.00,112.90,185.00);
- c(112.90,185.00,111.10,185.00,110.25,185.00);
- c(110.20,185.00,111.55,187.85,111.55,187.85);
- c(111.55,187.85,114.00,187.85,114.00,187.85);
- c(114.00,187.85,117.30,194.75,118.80,198.10);
- c(119.00,198.65,119.90,199.50,120.85,200.05);
- c(122.10,200.95,123.55,201.15,124.45,201.15);
- c(126.55,201.15,128.75,201.15,130.75,201.15);
- c(131.20,201.15,131.60,200.95,131.45,200.60);
- c(131.35,199.80,130.75,198.65,130.85,198.65);
- c(130.75,198.65,125.10,198.65,125.20,198.65);
- c(124.85,198.65,124.30,198.10,124.20,197.75);
- c(122.35,194.35,119.40,187.85,119.40,187.85);
- c(119.40,187.85,131.60,187.85,131.60,187.85);
- c(131.60,187.85,130.40,185.00,130.55,185.00);
- c(130.40,185.00,118.25,185.00,118.25,185.00);
- c(117.20,182.95,116.10,180.70,115.05,178.40);
- c(115.05,178.40,109.75,178.40,109.85,178.40);
- close_edge();
- p=path();
- gc_draw_style(oe);
- gc_color(100.00,0.00,0.01);
- s[0]=draw(p);
- m(130.65,194.90);
- c(129.65,192.95,128.60,190.70,127.55,188.40);
- c(127.25,187.85,126.90,186.70,127.30,186.20);
- c(127.80,185.25,128.95,185.00,129.95,185.00);
- c(134.95,185.00,140.10,185.00,145.20,185.00);
- c(145.80,185.00,146.45,185.00,146.80,185.25);
- c(147.25,186.20,148.05,187.50,148.05,187.50);
- l(132.80,187.50);
- c(132.50,187.50,131.80,187.85,131.90,188.10);
- c(132.05,188.40,132.35,188.65,132.35,188.65);
- c(132.35,188.65,136.10,188.65,138.00,188.65);
- c(138.50,188.65,139.05,189.05,139.30,189.20);
- c(139.95,190.95,140.75,192.65,141.50,194.10);
- c(141.55,194.75,141.35,194.90,141.25,195.25);
- c(141.00,195.80,139.85,196.40,139.05,196.40);
- c(137.50,196.40,136.00,196.40,134.50,196.40);
- c(133.45,196.40,132.35,196.65,131.60,196.05);
- c(131.10,195.80,130.75,195.50,130.65,194.90);
- close_edge();
- m(134.40,193.20);
- c(133.95,192.40,133.60,191.50,133.15,190.70);
- c(133.00,190.70,133.25,190.70,133.40,190.70);
- c(134.05,190.70,135.20,190.35,135.55,190.95);
- c(135.85,191.90,136.10,192.40,136.55,192.95);
- c(136.55,193.20,136.45,193.55,136.30,193.55);
- c(135.85,193.55,135.40,193.55,134.95,193.55);
- c(134.75,193.55,134.40,193.55,134.40,193.20);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(65.25,204.95);
- c(65.25,204.95,78.55,204.95,85.40,204.95);
- c(85.30,204.00,85.30,203.30,85.15,202.35);
- c(84.10,202.35,83.10,202.35,82.05,202.35);
- c(77.20,202.35,67.70,202.35,67.70,202.35);
- c(66.50,202.35,65.25,203.75,65.25,204.95);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(62.70,209.00);
- c(62.70,209.00,78.10,209.00,85.70,209.00);
- c(85.60,208.00,85.60,207.20,85.50,206.60);
- c(84.50,206.60,83.45,206.60,82.45,206.60);
- c(76.75,206.60,65.25,206.60,65.25,206.60);
- c(63.95,206.60,62.70,207.80,62.70,209.00);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(68.90,200.60);
- c(68.90,200.60,78.35,200.60,82.95,200.60);
- c(82.90,199.80,82.90,198.90,82.90,198.10);
- c(81.70,198.10,80.75,198.10,79.70,198.10);
- c(79.70,198.10,71.25,198.10,71.25,198.10);
- c(70.15,198.10,68.90,199.50,68.90,200.60);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(97.85,209.00);
- c(94.05,209.00,90.15,209.00,86.30,209.00);
- c(84.80,209.00,83.35,208.30,82.45,207.35);
- c(81.65,206.85,81.15,206.15,80.80,205.20);
- c(78.10,199.20,75.35,193.20,72.65,187.30);
- c(72.05,185.80,71.25,184.45,71.75,182.95);
- c(72.00,182.40,72.50,181.60,73.30,181.60);
- c(77.65,181.60,81.85,181.60,86.20,181.60);
- c(87.10,181.60,88.00,181.60,88.65,182.15);
- c(90.25,183.85,91.00,185.80,91.95,187.85);
- c(89.30,187.85,84.25,187.85,84.25,187.85);
- c(84.25,187.85,83.60,186.40,83.20,185.60);
- c(83.10,185.60,82.95,185.00,82.90,185.00);
- c(82.55,184.70,82.20,184.45,81.95,184.45);
- c(81.40,184.45,80.80,184.45,80.25,184.45);
- c(80.05,184.45,79.70,184.70,79.70,185.00);
- c(79.60,185.25,79.80,185.60,79.90,185.60);
- c(82.65,191.90,85.40,197.75,88.15,203.75);
- c(88.25,204.35,88.40,204.95,88.80,204.95);
- c(89.15,205.20,89.80,205.20,90.25,205.20);
- c(90.60,205.20,91.00,205.20,91.25,205.20);
- c(91.65,205.20,91.90,204.95,91.75,204.35);
- c(91.50,203.75,91.05,203.30,90.85,202.65);
- c(90.85,202.65,98.70,202.65,98.70,202.65);
- c(98.70,202.65,99.75,204.55,100.15,205.70);
- c(100.40,206.30,100.40,207.20,99.95,207.80);
- c(99.50,208.30,98.70,209.00,97.85,209.00);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(142.80,199.20);
- c(142.70,199.20,142.50,198.90,142.30,198.65);
- c(141.90,198.65,141.65,198.65,141.50,198.65);
- c(139.15,198.65,137.05,198.65,134.90,198.65);
- c(134.40,198.65,134.20,198.65,133.85,198.65);
- c(134.30,199.20,134.65,200.05,135.10,200.60);
- c(135.20,200.95,135.30,200.95,135.40,200.95);
- c(135.65,201.15,136.00,201.15,136.30,201.15);
- c(138.85,201.15,143.85,201.15,143.85,201.15);
- c(143.85,201.15,143.20,200.05,142.80,199.20);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]:=s[1];
- m(110.00,196.40);
- c(110.00,196.40,103.75,196.40,100.70,196.40);
- c(99.50,196.40,97.80,196.40,97.35,195.25);
- c(95.95,192.95,94.80,190.10,93.70,187.85);
- c(93.35,186.95,93.35,186.20,93.80,185.60);
- c(94.25,185.00,95.15,185.00,95.85,185.00);
- c(96.95,185.00,98.10,185.00,99.25,185.00);
- c(99.95,185.00,100.65,185.25,101.05,185.80);
- c(101.15,186.20,101.65,186.20,101.65,186.20);
- c(101.85,185.80,101.75,185.25,102.20,185.25);
- c(103.00,185.00,103.90,185.00,104.80,185.00);
- c(107.25,185.00,109.50,185.00,111.85,185.00);
- c(112.20,185.00,112.60,185.25,112.70,185.60);
- c(113.05,186.20,113.50,187.85,113.60,187.85);
- c(113.50,187.85,106.75,187.85,106.75,187.85);
- c(106.40,187.85,106.40,188.40,106.50,188.65);
- c(107.35,190.10,108.45,193.20,108.55,193.20);
- c(108.45,193.20,103.35,193.20,103.35,193.20);
- c(103.35,193.20,102.20,190.35,101.45,189.05);
- c(101.15,188.40,100.85,187.50,100.25,187.50);
- c(99.80,187.50,99.35,187.85,99.25,188.10);
- c(99.25,188.40,99.25,189.05,99.50,189.20);
- c(100.15,190.70,100.70,192.05,101.45,193.55);
- c(101.65,193.80,101.85,194.35,102.35,194.10);
- c(104.50,194.35,108.95,194.35,108.95,194.10);
- c(108.95,194.35,110.00,196.40,110.00,196.40);
- close_edge();
- p=path();
- s[1]=draw(p);
- s[0]over=s[1];
- m(143.70,198.65);
- c(143.45,198.30,143.30,198.10,143.05,197.75);
- c(142.80,197.75,142.50,197.75,142.30,197.75);
- c(139.95,197.75,137.80,197.75,135.65,197.75);
- c(135.30,197.75,134.95,197.75,134.65,197.75);
- c(135.10,198.65,135.55,199.20,136.00,199.80);
- c(136.00,200.05,136.10,200.05,136.20,200.45);
- c(136.45,200.45,136.90,200.45,137.25,200.45);
- c(139.75,200.45,144.60,200.45,144.75,200.45);
- c(144.60,200.45,143.95,199.20,143.70,198.65);
- close_edge();
- p=path();
- gc_draw_style(nzw);
- gc_color(0.00,0.00,0.00);
- gc_opacity(0.59);
- s[1]=draw(p);
- m(131.65,194.10);
- c(130.65,191.90,129.75,189.80,128.75,187.50);
- c(128.00,186.35,132.55,186.95,132.05,185.70);
- c(131.90,185.25,131.70,184.75,131.45,184.10);
- c(136.30,184.10,141.25,184.10,146.25,184.10);
- c(146.80,184.10,147.45,184.10,147.85,184.45);
- c(148.25,185.25,149.10,186.70,149.10,186.70);
- c(149.10,186.70,133.85,186.70,133.85,186.70);
- c(133.45,186.70,132.80,186.95,133.00,187.30);
- c(133.00,187.50,133.40,187.85,133.40,187.85);
- c(133.40,187.85,137.10,187.85,139.05,187.85);
- c(139.55,187.85,140.10,188.10,140.35,188.40);
- c(141.00,190.10,141.75,191.90,142.50,193.55);
- c(142.55,193.80,142.40,194.10,142.30,194.35);
- c(142.00,195.25,140.85,195.80,140.10,195.50);
- c(138.50,195.80,137.05,195.80,135.55,195.50);
- c(134.50,195.50,133.40,195.80,132.55,195.25);
- c(132.10,194.90,131.80,194.75,131.65,194.10);
- close_edge();
- m(135.40,192.40);
- c(134.95,191.90,134.65,190.70,134.20,190.10);
- c(134.05,189.80,134.30,189.80,134.40,189.55);
- c(135.20,189.80,136.20,189.55,136.55,190.10);
- c(136.90,190.70,137.25,191.50,137.60,192.40);
- c(137.60,192.40,137.50,192.65,137.35,192.65);
- c(136.90,192.65,136.45,192.65,136.00,192.65);
- c(135.80,192.65,135.40,192.65,135.40,192.40);
- close_edge();
- p=path();
- gc_draw_style(oe);
- s[2]=draw(p);
- s[1]:=s[2];
- m(69.90,199.80);
- c(69.90,199.80,79.35,199.80,84.00,199.80);
- c(83.85,198.90,83.85,198.10,83.85,197.20);
- c(82.75,197.20,81.70,197.20,80.75,197.20);
- c(80.75,197.20,72.25,197.20,72.25,197.20);
- c(71.15,197.20,69.90,198.65,69.90,199.80);
- close_edge();
- p=path();
- gc_draw_style(nzw);
- s[2]=draw(p);
- s[1]:=s[2];
- m(66.30,203.75);
- c(66.30,203.75,79.60,203.75,86.45,203.75);
- c(86.30,203.30,86.30,202.35,86.20,201.50);
- c(85.15,201.50,84.10,201.50,83.10,201.50);
- c(78.20,201.50,68.75,201.50,68.75,201.50);
- c(67.50,201.50,66.30,202.65,66.30,203.75);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]:=s[2];
- m(99.05,208.00);
- c(95.00,208.00,91.20,208.00,87.35,208.00);
- c(85.80,208.00,84.35,207.35,83.45,206.60);
- c(82.65,206.15,82.20,205.20,81.85,204.35);
- c(79.10,198.30,76.40,192.40,73.65,186.20);
- c(73.10,185.00,72.25,183.55,72.75,182.15);
- c(73.00,181.60,73.55,180.50,74.35,180.50);
- c(78.65,180.50,82.90,180.50,87.20,180.50);
- c(88.15,180.50,89.05,180.70,89.70,181.25);
- c(91.25,182.75,91.95,185.00,93.00,186.95);
- c(90.35,186.95,85.30,186.95,85.30,186.95);
- c(85.30,186.95,84.55,185.60,84.25,185.00);
- c(84.10,184.45,84.00,184.10,83.85,183.85);
- c(83.60,183.85,83.20,183.55,82.95,183.55);
- c(82.45,183.55,81.85,183.55,81.25,183.55);
- c(81.05,183.55,80.75,183.85,80.75,183.85);
- c(80.60,184.45,80.80,184.45,80.95,185.00);
- c(83.65,190.95,86.45,196.95,89.15,203.30);
- c(89.30,203.45,89.45,203.75,89.80,204.00);
- c(90.15,204.35,90.85,204.35,91.25,204.35);
- c(91.65,204.35,91.95,204.35,92.30,204.35);
- c(92.65,204.35,92.85,203.75,92.80,203.75);
- c(92.55,202.85,92.10,202.35,91.90,201.75);
- c(91.90,201.75,99.75,201.75,99.80,201.75);
- c(99.75,201.75,100.70,203.75,101.15,204.95);
- c(101.45,205.45,101.45,206.30,100.95,206.85);
- c(100.50,207.35,99.75,208.00,99.05,208.00);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]:=s[2];
- m(63.75,208.00);
- c(63.75,208.00,79.10,208.00,86.70,208.00);
- c(86.60,207.20,86.60,206.30,86.50,205.45);
- c(85.50,205.45,84.50,205.45,83.45,205.45);
- c(77.75,205.45,66.30,205.45,66.30,205.45);
- c(65.00,205.45,63.75,206.85,63.75,208.00);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]:=s[2];
- m(110.95,195.80);
- c(110.95,195.80,104.80,195.80,101.75,195.80);
- c(100.50,195.80,98.80,195.50,98.30,194.35);
- c(96.95,191.90,95.85,189.55,94.70,186.95);
- c(94.35,186.20,94.35,185.25,94.80,184.70);
- c(95.25,184.45,96.20,184.10,96.95,184.10);
- c(98.00,184.10,99.15,184.10,100.25,184.10);
- c(100.95,184.10,101.65,184.45,102.10,185.00);
- c(102.20,185.00,102.65,185.60,102.65,185.60);
- c(102.85,185.00,102.75,184.45,103.25,184.45);
- c(104.05,184.10,104.95,184.10,105.85,184.10);
- c(108.25,184.10,110.50,184.10,112.90,184.10);
- c(113.25,184.10,113.60,184.45,113.70,184.70);
- c(114.00,185.25,114.50,186.95,114.60,186.95);
- c(114.50,186.95,107.80,186.95,107.80,186.95);
- c(107.40,186.95,107.40,187.50,107.65,187.85);
- c(108.30,189.20,109.50,192.40,109.60,192.40);
- c(109.50,192.40,104.40,192.40,104.40,192.40);
- c(104.40,192.40,103.25,189.55,102.60,188.10);
- c(102.20,187.50,101.85,186.70,101.30,186.70);
- c(100.85,186.70,100.40,186.95,100.25,187.30);
- c(100.25,187.50,100.25,188.10,100.50,188.40);
- c(101.15,189.80,101.85,191.25,102.60,192.65);
- c(102.65,192.95,102.85,193.55,103.35,193.55);
- c(105.45,193.55,110.00,193.55,110.00,193.55);
- l(110.95,195.80);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]:=s[2];
- m(110.90,177.65);
- c(110.75,177.65,113.95,184.10,113.95,184.10);
- c(113.95,184.10,115.05,186.95,115.05,186.95);
- c(115.05,186.95,118.35,193.80,119.85,197.20);
- c(120.15,197.75,120.95,198.65,122.00,199.20);
- c(123.15,200.05,124.60,200.45,125.50,200.45);
- c(127.55,200.45,129.75,200.45,131.80,200.45);
- c(132.25,200.45,132.55,200.05,132.50,199.80);
- c(132.35,199.20,131.80,197.60,131.90,197.60);
- c(131.80,197.60,126.15,197.60,126.25,197.60);
- c(125.90,197.60,125.35,197.20,125.20,196.95);
- c(123.40,193.55,120.45,186.95,120.45,186.95);
- c(120.45,186.95,132.55,186.95,132.55,186.95);
- c(132.55,186.95,131.80,185.00,131.45,184.10);
- c(127.35,184.10,119.25,184.10,119.25,184.10);
- c(118.25,182.15,117.10,179.90,116.10,177.65);
- c(116.10,177.65,110.75,177.65,110.90,177.65);
- close_edge();
- p=path();
- s[2]=draw(p);
- s[1]over=s[2];
- s[0]over=s[1];
- page:=s[0];
- s=NULL;
- #]page
- #]document
-